home *** CD-ROM | disk | FTP | other *** search
- object FormFont: TFormFont
- Left = 221
- Top = 103
- BorderStyle = bsToolWindow
- Caption = 'Font'
- ClientHeight = 290
- ClientWidth = 279
- Color = clBtnFace
- ParentFont = True
- FormStyle = fsStayOnTop
- OldCreateOrder = False
- Scaled = False
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 12
- object Bevel1: TBevel
- Left = 8
- Top = 60
- Width = 261
- Height = 185
- Shape = bsFrame
- end
- object LabelText: TLabel
- Left = 8
- Top = 260
- Width = 25
- Height = 12
- Caption = 'Text:'
- end
- object LabelFont: TLabel
- Left = 20
- Top = 76
- Width = 25
- Height = 12
- Caption = 'Font:'
- end
- object LabelSize: TLabel
- Left = 20
- Top = 104
- Width = 23
- Height = 12
- Caption = 'Size:'
- end
- object LabelStyle: TLabel
- Left = 20
- Top = 132
- Width = 34
- Height = 12
- Caption = 'Styles:'
- end
- object LabelBorder: TLabel
- Left = 20
- Top = 184
- Width = 36
- Height = 12
- Caption = 'Border:'
- end
- object LabelPitch: TLabel
- Left = 20
- Top = 216
- Width = 28
- Height = 12
- Caption = 'Pitch:'
- end
- object Edit1: TEdit
- Left = 80
- Top = 100
- Width = 45
- Height = 20
- TabOrder = 2
- Text = '20'
- OnChange = ComboFontChange
- end
- object UpDownSize: TUpDown
- Left = 125
- Top = 100
- Width = 15
- Height = 20
- Associate = Edit1
- Min = 1
- Max = 1000
- Position = 20
- TabOrder = 3
- Wrap = False
- end
- object CheckBold: TCheckBox
- Left = 80
- Top = 132
- Width = 89
- Height = 17
- Caption = 'Bold'
- TabOrder = 4
- OnClick = ComboFontChange
- end
- object CheckItalic: TCheckBox
- Left = 172
- Top = 132
- Width = 89
- Height = 17
- Caption = 'Italic'
- TabOrder = 5
- OnClick = ComboFontChange
- end
- object CheckUnder: TCheckBox
- Left = 80
- Top = 152
- Width = 89
- Height = 17
- Caption = 'Underline'
- TabOrder = 6
- OnClick = ComboFontChange
- end
- object CheckStrike: TCheckBox
- Left = 172
- Top = 152
- Width = 89
- Height = 17
- Caption = 'Strikeout'
- TabOrder = 7
- OnClick = ComboFontChange
- end
- object GroupPreset: TGroupBox
- Left = 8
- Top = 8
- Width = 261
- Height = 45
- Caption = 'Preset'
- TabOrder = 12
- object ComboPreset: TComboBox
- Left = 8
- Top = 16
- Width = 133
- Height = 20
- ItemHeight = 12
- TabOrder = 0
- OnClick = ComboPresetClick
- end
- object btnAdd: TButton
- Left = 144
- Top = 16
- Width = 53
- Height = 21
- Caption = 'Add'
- TabOrder = 1
- OnClick = btnAddClick
- end
- object btnDel: TButton
- Left = 200
- Top = 16
- Width = 53
- Height = 21
- Caption = 'Delete'
- TabOrder = 2
- OnClick = btnDelClick
- end
- end
- object ComboText: TComboBox
- Left = 60
- Top = 256
- Width = 209
- Height = 20
- ItemHeight = 12
- TabOrder = 0
- OnChange = ComboFontChange
- end
- object Edit2: TEdit
- Left = 80
- Top = 180
- Width = 45
- Height = 20
- TabOrder = 8
- Text = '1'
- OnChange = ComboFontChange
- end
- object UpDownBorder: TUpDown
- Left = 125
- Top = 180
- Width = 15
- Height = 20
- Associate = Edit2
- Min = 0
- Max = 50
- Position = 1
- TabOrder = 9
- Wrap = False
- end
- object Edit3: TEdit
- Left = 80
- Top = 212
- Width = 45
- Height = 20
- TabOrder = 10
- Text = '0'
- OnChange = ComboFontChange
- end
- object UpDownPitch: TUpDown
- Left = 125
- Top = 212
- Width = 15
- Height = 20
- Associate = Edit3
- Min = -100
- Position = 0
- TabOrder = 11
- Wrap = False
- end
- object ComboFont: TFontComboBoxEx
- Left = 80
- Top = 72
- Width = 173
- Height = 18
- TabOrder = 1
- OnClick = ComboFontChange
- end
- end
-